home *** CD-ROM | disk | FTP | other *** search
/ Workbench Designer 2 / Workbench Designer 2.iso / time / engclock_v7.0 / engclock7_source / jump.c < prev    next >
Encoding:
C/C++ Source or Header  |  1995-12-01  |  1.5 KB  |  65 lines
  1. /*************************************/
  2. /*            Jump v1.0              */
  3. /*            =========              */
  4. /* (C) 1995 by Ben Matthew.  Module  */
  5. /* for English Clock v4.3+           */
  6. /*************************************/
  7.  
  8. #include <stdio.h>
  9. #include <string.h>
  10. #include <stdlib.h>
  11. #include <clib/intuition_protos.h>
  12. #include <clib/exec_protos.h>
  13. #include <clib/dos_protos.h>
  14. #include <intuition/intuition.h>
  15. #include <exec/exec.h>
  16.  
  17. extern struct NewWindow win1;
  18. extern char screen[200];
  19. extern char *screen_ptr;
  20. extern struct Menu menu1;
  21. extern struct Window *win_p;
  22. extern struct Screen *pubscreen;
  23. extern void msg(char *msg);
  24.  
  25. extern short closeall(void);
  26.  
  27.  
  28. BOOL jump(void);
  29.  
  30. BOOL jump(void) {
  31.    /***********************************/
  32.    /* Jump() © 1995 by Ben Matthew    */
  33.    /* $VERS 1.0                       */
  34.    /* Description: Jumps window to    */
  35.    /* next public screen, takes no    */
  36.    /* parameters and returns success  */
  37.    /***********************************/
  38.  
  39.    char *result, buffer[200];
  40.  
  41.    result=NextPubScreen(pubscreen,buffer);
  42.  
  43.    ClearMenuStrip(win_p);
  44.    CloseWindow(win_p);
  45.    UnlockPubScreen(NULL,pubscreen);
  46.    pubscreen=LockPubScreen(buffer);
  47.    if(!pubscreen) {
  48.       msg("Jump went wrong! (Debug: LockPubScreen(buffer)");
  49.       closeall();
  50.       exit(NULL);
  51.    }
  52.    win1.Screen=pubscreen;
  53.    win_p=(struct Window *)OpenWindow(&win1);
  54.    if(!win_p) {
  55.       msg("Jump went wrong! (Debug: OpenWindow() ");
  56.       closeall();
  57.       exit(NULL);
  58.    }
  59.    SetMenuStrip(win_p,&menu1 );
  60.    return(1);
  61.  
  62. }
  63.  
  64.  
  65.